home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / aros / dos / freedosobject.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-09-12  |  2.0 KB  |  96 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: freedosobject.c,v 1.3 1996/08/13 13:52:47 digulla Exp $
  4.     $Log: freedosobject.c,v $
  5.     Revision 1.3  1996/08/13 13:52:47  digulla
  6.     Replaced <dos/dosextens.h> by "dos_intern.h" or added "dos_intern.h"
  7.     Replaced __AROS_LA by __AROS_LHA
  8.  
  9.     Revision 1.2  1996/08/01 17:40:52  digulla
  10.     Added standard header for all files
  11.  
  12.     Desc:
  13.     Lang: english
  14. */
  15. #include <exec/memory.h>
  16. #include <clib/exec_protos.h>
  17. #include <dos/exall.h>
  18. #include "dos_intern.h"
  19.  
  20. /*****************************************************************************
  21.  
  22.     NAME */
  23.     #include <clib/dos_protos.h>
  24.  
  25.     __AROS_LH2(void, FreeDosObject,
  26.  
  27. /*  SYNOPSIS */
  28.     __AROS_LHA(ULONG, type, D1),
  29.     __AROS_LHA(APTR,  ptr,  D2),
  30.  
  31. /*  LOCATION */
  32.     struct DosLibrary *, DOSBase, 39, Dos)
  33.  
  34. /*  FUNCTION
  35.     Frees an object allocated with AllocDosObject.
  36.  
  37.     INPUTS
  38.     type - object type. The same parameter as given to AllocDosObject().
  39.     ptr  - Pointer to object.
  40.  
  41.     RESULT
  42.  
  43.     NOTES
  44.  
  45.     EXAMPLE
  46.  
  47.     BUGS
  48.  
  49.     SEE ALSO
  50.  
  51.     INTERNALS
  52.  
  53.     HISTORY
  54.     29-10-95    digulla automatically created from
  55.                 dos_lib.fd and clib/dos_protos.h
  56.  
  57. *****************************************************************************/
  58. {
  59.     __AROS_FUNC_INIT
  60.     __AROS_BASE_EXT_DECL(struct DosLibrary *,DOSBase)
  61.  
  62.     switch(type)
  63.     {
  64.     case DOS_FILEHANDLE:
  65.     {
  66.         struct FileHandle *fh=(struct FileHandle *)ptr;
  67.         if(fh->fh_Flags&FHF_BUF)
  68.         FreeMem(fh->fh_Buf,fh->fh_Size);
  69.         FreeMem(fh,sizeof(struct FileHandle));
  70.         break;
  71.     }
  72.     case DOS_FIB:
  73.         FreeMem(ptr,sizeof(struct FileInfoBlock));
  74.         break;
  75.     case DOS_EXALLCONTROL:
  76.         FreeMem(ptr,sizeof(struct ExAllControl));
  77.         break;
  78.     case DOS_CLI:
  79.     {
  80.         struct CommandLineInterface *cli=(struct CommandLineInterface *)ptr;
  81.         BPTR *cur, *next;
  82.         cur=(BPTR *)BADDR(cli->cli_CommandDir);
  83.         FreeMem(ptr,sizeof(struct CommandLineInterface));
  84.         while(cur!=NULL)
  85.         {
  86.         next=(BPTR *)BADDR(cur[0]);
  87.         UnLock(cur[1]);
  88.         FreeVec(cur);
  89.         cur=next;
  90.         }
  91.         break;
  92.     }
  93.     }
  94.     __AROS_FUNC_EXIT
  95. } /* FreeDosObject */
  96.